home *** CD-ROM | disk | FTP | other *** search
/ Programming Languages Suite / ProgramD2.iso / Visual Database / Visual BASIC 5.0 (Ent. Edition) / Vb5ent Extractor.EXE / VB / VBONLINE / VBONLINE.M14 / AVP05011.BMP (.png) < prev    next >
Multiple Resolution Bitmap  |  1996-12-11  |  21.6 KB  |  651x469  |  4-bit (13 colors)
   ocr: frmSetTime - OX frmSetTime X Start Time 12:00A AM OK End Time 12:30A à frmSetTime -OX (General) ValidateTime Channel 3 Private Sub Form Load() If Recorder.StartRecording <> Empty Then extstart.lext - Recorder.StartRecording End If If Recorder.StopRecording <> Empty Then CxtEnd.lext = Recorder.stopkecording End If cxtchannel = Recorder.Channel End Sub Function ValidateTime (Time As String, Field As Control) AS Dim strMsg As String If IsDate (Time) Then Fleld.lext = Format$ (Time, "h:mm AM/PM") ValidateTime = Truel Else